home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / autose1g / frmcompr.frm < prev    next >
Text File  |  1999-06-24  |  15KB  |  564 lines
  1. VERSION 5.00
  2. Object = "{D2D9B7C1-7650-11D1-9481-00A0247B7657}#1.0#0"; "ZLIBOCX2.DLL"
  3. Begin VB.Form frmCompress 
  4.    AutoRedraw      =   -1  'True
  5.    BackColor       =   &H00000000&
  6.    BorderStyle     =   0  'None
  7.    ClientHeight    =   6900
  8.    ClientLeft      =   930
  9.    ClientTop       =   525
  10.    ClientWidth     =   9495
  11.    ControlBox      =   0   'False
  12.    ForeColor       =   &H00000000&
  13.    LinkTopic       =   "Form1"
  14.    MaxButton       =   0   'False
  15.    MinButton       =   0   'False
  16.    PaletteMode     =   1  'UseZOrder
  17.    ScaleHeight     =   6900
  18.    ScaleWidth      =   9495
  19.    ShowInTaskbar   =   0   'False
  20.    Begin ZLIBOCX2LibCtl.zlibIF zlibZipper 
  21.       Height          =   285
  22.       Left            =   1215
  23.       OleObjectBlob   =   "frmCompress.frx":0000
  24.       TabIndex        =   12
  25.       Top             =   5085
  26.       Visible         =   0   'False
  27.       Width           =   1680
  28.    End
  29.    Begin VB.DirListBox Dir1 
  30.       BackColor       =   &H00000000&
  31.       BeginProperty Font 
  32.          Name            =   "MS Sans Serif"
  33.          Size            =   8.25
  34.          Charset         =   0
  35.          Weight          =   700
  36.          Underline       =   0   'False
  37.          Italic          =   0   'False
  38.          Strikethrough   =   0   'False
  39.       EndProperty
  40.       ForeColor       =   &H0000FF00&
  41.       Height          =   1890
  42.       Left            =   4035
  43.       TabIndex        =   8
  44.       Top             =   2130
  45.       Width           =   2790
  46.    End
  47.    Begin VB.DriveListBox Drive1 
  48.       BackColor       =   &H00000000&
  49.       BeginProperty Font 
  50.          Name            =   "MS Sans Serif"
  51.          Size            =   8.25
  52.          Charset         =   0
  53.          Weight          =   700
  54.          Underline       =   0   'False
  55.          Italic          =   0   'False
  56.          Strikethrough   =   0   'False
  57.       EndProperty
  58.       ForeColor       =   &H0000FF00&
  59.       Height          =   315
  60.       Left            =   4050
  61.       TabIndex        =   7
  62.       Top             =   4140
  63.       Width           =   2790
  64.    End
  65.    Begin VB.Timer tmrExit 
  66.       Enabled         =   0   'False
  67.       Interval        =   3000
  68.       Left            =   360
  69.       Top             =   255
  70.    End
  71.    Begin VB.CommandButton cmdCompress 
  72.       Caption         =   "&OK"
  73.       Default         =   -1  'True
  74.       Height          =   330
  75.       Left            =   3915
  76.       TabIndex        =   5
  77.       Top             =   4950
  78.       Width           =   1200
  79.    End
  80.    Begin VB.OptionButton optGame 
  81.       BackColor       =   &H00000000&
  82.       Caption         =   "Game 5"
  83.       BeginProperty Font 
  84.          Name            =   "MS Sans Serif"
  85.          Size            =   8.25
  86.          Charset         =   0
  87.          Weight          =   700
  88.          Underline       =   0   'False
  89.          Italic          =   0   'False
  90.          Strikethrough   =   0   'False
  91.       EndProperty
  92.       ForeColor       =   &H0000FF00&
  93.       Height          =   330
  94.       Index           =   4
  95.       Left            =   2325
  96.       TabIndex        =   4
  97.       Top             =   3810
  98.       Width           =   1125
  99.    End
  100.    Begin VB.OptionButton optGame 
  101.       BackColor       =   &H00000000&
  102.       Caption         =   "Game 4"
  103.       BeginProperty Font 
  104.          Name            =   "MS Sans Serif"
  105.          Size            =   8.25
  106.          Charset         =   0
  107.          Weight          =   700
  108.          Underline       =   0   'False
  109.          Italic          =   0   'False
  110.          Strikethrough   =   0   'False
  111.       EndProperty
  112.       ForeColor       =   &H0000FF00&
  113.       Height          =   330
  114.       Index           =   3
  115.       Left            =   2325
  116.       TabIndex        =   3
  117.       Top             =   3450
  118.       Width           =   1125
  119.    End
  120.    Begin VB.OptionButton optGame 
  121.       BackColor       =   &H00000000&
  122.       Caption         =   "Game 3"
  123.       BeginProperty Font 
  124.          Name            =   "MS Sans Serif"
  125.          Size            =   8.25
  126.          Charset         =   0
  127.          Weight          =   700
  128.          Underline       =   0   'False
  129.          Italic          =   0   'False
  130.          Strikethrough   =   0   'False
  131.       EndProperty
  132.       ForeColor       =   &H0000FF00&
  133.       Height          =   330
  134.       Index           =   2
  135.       Left            =   2325
  136.       TabIndex        =   2
  137.       Top             =   3090
  138.       Width           =   1125
  139.    End
  140.    Begin VB.OptionButton optGame 
  141.       BackColor       =   &H00000000&
  142.       Caption         =   "Game 2"
  143.       BeginProperty Font 
  144.          Name            =   "MS Sans Serif"
  145.          Size            =   8.25
  146.          Charset         =   0
  147.          Weight          =   700
  148.          Underline       =   0   'False
  149.          Italic          =   0   'False
  150.          Strikethrough   =   0   'False
  151.       EndProperty
  152.       ForeColor       =   &H0000FF00&
  153.       Height          =   330
  154.       Index           =   1
  155.       Left            =   2325
  156.       TabIndex        =   1
  157.       Top             =   2730
  158.       Width           =   1125
  159.    End
  160.    Begin VB.OptionButton optGame 
  161.       BackColor       =   &H00000000&
  162.       Caption         =   "Game 1"
  163.       BeginProperty Font 
  164.          Name            =   "MS Sans Serif"
  165.          Size            =   8.25
  166.          Charset         =   0
  167.          Weight          =   700
  168.          Underline       =   0   'False
  169.          Italic          =   0   'False
  170.          Strikethrough   =   0   'False
  171.       EndProperty
  172.       ForeColor       =   &H0000FF00&
  173.       Height          =   330
  174.       Index           =   0
  175.       Left            =   2325
  176.       TabIndex        =   0
  177.       Top             =   2340
  178.       Width           =   1125
  179.    End
  180.    Begin VB.Label lblQuitGame 
  181.       Appearance      =   0  'Flat
  182.       BackColor       =   &H80000005&
  183.       BackStyle       =   0  'Transparent
  184.       Caption         =   "Quit"
  185.       Enabled         =   0   'False
  186.       BeginProperty Font 
  187.          Name            =   "MS Sans Serif"
  188.          Size            =   13.5
  189.          Charset         =   0
  190.          Weight          =   400
  191.          Underline       =   0   'False
  192.          Italic          =   0   'False
  193.          Strikethrough   =   0   'False
  194.       EndProperty
  195.       ForeColor       =   &H000000FF&
  196.       Height          =   420
  197.       Left            =   4185
  198.       TabIndex        =   11
  199.       Top             =   5895
  200.       Visible         =   0   'False
  201.       Width           =   690
  202.    End
  203.    Begin VB.Label lblContinue 
  204.       Appearance      =   0  'Flat
  205.       BackColor       =   &H80000005&
  206.       BackStyle       =   0  'Transparent
  207.       Caption         =   "Continue this game"
  208.       Enabled         =   0   'False
  209.       BeginProperty Font 
  210.          Name            =   "MS Sans Serif"
  211.          Size            =   13.5
  212.          Charset         =   0
  213.          Weight          =   400
  214.          Underline       =   0   'False
  215.          Italic          =   0   'False
  216.          Strikethrough   =   0   'False
  217.       EndProperty
  218.       ForeColor       =   &H000000FF&
  219.       Height          =   465
  220.       Left            =   3375
  221.       TabIndex        =   10
  222.       Top             =   5310
  223.       Visible         =   0   'False
  224.       Width           =   3165
  225.    End
  226.    Begin VB.Label lblMessage 
  227.       BackStyle       =   0  'Transparent
  228.       BeginProperty Font 
  229.          Name            =   "MS Sans Serif"
  230.          Size            =   13.5
  231.          Charset         =   0
  232.          Weight          =   400
  233.          Underline       =   0   'False
  234.          Italic          =   0   'False
  235.          Strikethrough   =   0   'False
  236.       EndProperty
  237.       ForeColor       =   &H0000FF00&
  238.       Height          =   420
  239.       Left            =   2790
  240.       TabIndex        =   9
  241.       Top             =   4635
  242.       Width           =   4020
  243.    End
  244.    Begin VB.Label lblTitle 
  245.       BackStyle       =   0  'Transparent
  246.       Caption         =   "Save Game"
  247.       BeginProperty Font 
  248.          Name            =   "MS Sans Seri